home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1996 #15
/
Monster Media Number 15 (Monster Media)(July 1996).ISO
/
arc
/
shezs19c.zip
/
REDATE.BAT
< prev
next >
Wrap
DOS Batch File
|
1996-05-03
|
2KB
|
65 lines
ECHO OFF
SET GET=
IF %1.==. GOTO :HELP
IF %1.==PATH. GOTO :PATH
IF NOT EXIST %1 GOTO :ERROR
IF %2.==TIME. %0 %1 S %2
IF %2.==. %0 %1 S S
IF %3.==. %0 %1 %2 S
CLS
DIR %1
ECHO
IF %2.==DATE. GOTO :DATE
IF %3.==TIME. GOTO :TIME
IF %4.==AUTO. GOTO :AUTO
GET C "CONFIRM Redate these files with Date=%2 Time=%3 (y/N/(d)ate/(t)ime)? " YNDT /W60
IF %GET%.==D. GOTO :DATE
IF %GET%.==T. GOTO :TIME
IF NOT %GET%.==Y. GOTO :EXIT
GOTO :AUTO
:PATH
GET S "What Path should I use (drive:\dir\filespec.ext)? " /W60
IF %GET%.==}. SET GET=*.*
IF %GET%.==. SET GET=*.*
%0 %GET% %2 %3 %4 %5 %6 %7 %8 %9
:DATE
GET S "What Date should I use (S/K/mm-dd-yyyy)? " /W60
IF %GET%.==}. SET GET=S
IF %GET%.==. SET GET=S
%0 %1 %GET% %3 %4 %5 %6 %7 %8 %9
:TIME
GET S "What Time should I use (S/K/hh:mm:ss)? " /W60
IF %GET%.==}. SET GET=S
IF %GET%.==. SET GET=S
%0 %1 %2 %GET% %4 %5 %6 %7 %8 %9
:AUTO
IF %1.==AUTO. SHIFT
IF NOT EXIST %1 GOTO :EXIT
CHANGEIT %1 %2 %3
GOTO :EXIT
:ERROR
ECHO
ECHO I could not find the "%1" files. Please try again.
ECHO
PAUSE
GOTO :EXIT
:HELP
ECHO REDATE.BAT uses CHANGEIT.EXE to redate the files.
ECHO To use REDATE.BAT please specify the drive:\dir\filespec.txt to redate.
ECHO
ECHO REDATE C:\TEST\*.* [K,S,mm-dd-yyyy,DATE] [K,S,hh:mm:ss,TIME] [AUTO]
ECHO
ECHO [DATE] Prompts for the DATE to use. (Requires GET.EXE)
ECHO [TIME] Prompts for the TIME to use. (Requires GET.EXE)
ECHO [AUTO] option bypasses the "Confirm" prompt.
ECHO You can ReDate one file, a directory or a disk of files.
ECHO
:EXIT